﻿

Public Class EventView

    Private Sub MenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem1.Click
        HomeForm.Show()
        Me.Hide()
    End Sub

    Private Sub EventView_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: This line of code loads data into the 'SMSRSVPDataSet.RSVPs' table. You can move, or remove it, as needed.
        Me.RSVPsTableAdapter.Fill(Me.SMSRSVPDataSet.RSVPs)

    End Sub

    Private Sub EventView_Closing(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        HomeForm.Show()
    End Sub
End Class